home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hyper Stacks 1994 May
/
Hyper Stacks (Pacific HiTech)(1994)[Mac].iso
/
MacTools
/
HyperCard BBS
/
Hyper House
/
card_6816.txt
< prev
next >
Wrap
Text File
|
1988-05-09
|
2KB
|
91 lines
-- card: 6816 from stack: in
-- bmap block id: 9697
-- flags: 0000
-- background id: 2607
-- name:
----- HyperTalk script -----
on initCard
global onLine
if onLine then put "Handling unknown user..."
pass initCard
end initCard
-- part 3 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=361 top=227 right=249 bottom=414
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Yes
----- HyperTalk script -----
on doIt
visual effect dissolve fast
go to next card
end doIt
-- part 5 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=354 top=171 right=223 bottom=489
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 6 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=427 top=227 right=249 bottom=479
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: No
----- HyperTalk script -----
on doIt
visual effect iris close fast
pop card
end doIt
-- part 7 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=378 top=257 right=279 bottom=464
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Retry login
----- HyperTalk script -----
on doIt
visual effect dissolve fast
go to previous card
end doIt
-- part contents for card part 5
----- text -----
I don't know you. Do you want to join this BBS?